home *** CD-ROM | disk | FTP | other *** search
/ Mind Games (Tessera) / MindGames.iso / files / main.dxr / Internal_6_play mind games.ls < prev    next >
Encoding:
Text File  |  2002-11-25  |  607 b   |  23 lines
  1. property myTargetMovie
  2. global myaccesscode, gMovingOn, gAdjusted, gOldRes
  3.  
  4. on mouseUp me
  5.   temp = [gAdjusted, gOldRes]
  6.   resetMovie()
  7.   gMovingOn = 1
  8.   myaccesscode = 1
  9.   gAdjusted = temp[1]
  10.   gOldRes = temp[2]
  11.   go(1, myTargetMovie)
  12. end
  13.  
  14. on getPropertyDescriptionList me
  15.   if the currentSpriteNum = 0 then
  16.     theComment = "Play which movie on exitFrame?"
  17.   else
  18.     theComment = "Play which movie on mouseUp?"
  19.   end if
  20.   theComment = theComment & RETURN & "(Include path if necessary)."
  21.   return [#myTargetMovie: [#comment: theComment, #format: #string, #default: "Type the name of your movie here"]]
  22. end
  23.